home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Magazin: Amiga-CD 1997 May & June
/
Amiga-CD 1997 #5-6.iso
/
amiga-internet-seiten
/
magazin
/
a03-97
/
listing2
< prev
next >
Wrap
Text File
|
1997-03-21
|
2KB
|
58 lines
; Test-Installerskript, ©1996 Marcel Bennicke
; ---------------------------------------------------
; alle Dateien in devs:dosdrivers werden in ein neues
; Verzeichnis kopiert
(set #nohelp "Keine Hilfe verfügbar")
(complete 0) ; Wert 0..100
(message "\n\n\nWillkommen zum Installerkurs des "
"Amiga-Magazins.\n\nIm folgenden werden alle aktiven "
"Dosdrivers in ein neues Verzeichnis kopiert (Ihre "
"Systemkonfiguration bleibt unberührt)."
(all) ; Nachricht auch im Einsteigermodus zeigen
)
(welcome) ; Startseite mit Standardtext
; an @default-dest das Ergebnis von askdir zuweisen
(set @default-dest
(askdir (prompt "Bitte wählen Sie das Installationsverzeichnis."
" Dort wird eine neue Schublade angelegt" )
(help @askdir-help)
(default @default-dest)
)
)
; neuen Verzeichnisnamen anhängen
(set @default-dest (tackon @default-dest "Meine_DosDrivers"))
(complete 40)
; schon einmal installiert ?
(if (exists @default-dest)
(rename @default-dest (cat @default-dest "_backup")
(prompt "Das Verzeichnis \"Meine_DosDrivers\" existiert"
" bereits.\n\nDie alte Installation wird gerettet")
(help #nohelp)
(confirm) ; im Expertenmodus bestätigen lassen
)
)
(complete 60)
(copyfiles
(prompt "Die Dateien aus \"devs:DosDrivers\" werden nun kopiert")
(help #nohelp)
(source "devs:dosdrivers") ; Quelle
(dest @default-dest) ; Ziel, erzeugt gleichzeitig neue Schublade
(infos) ; Icons mitkopieren
(noposition) ; Icon-Position resetten
(confirm average) ; ab user-level "average" bestätigen
(all) ; alle Dateien im Quellverzeichnis kop
)
(complete 100)